home *** CD-ROM | disk | FTP | other *** search
/ cyber.net interactivo 3 / inter@ivo 1996-04.iso / cybint3 / bin / burmest.dxr / 00038.ls < prev    next >
Encoding:
Text File  |  1996-03-22  |  148 b   |  10 lines
  1. on exitFrame
  2.   global dir
  3.   set dir to 1
  4.   set i to 2
  5.   repeat while i < 7
  6.     set the visible of sprite i to 0
  7.     set i to i + 1
  8.   end repeat
  9. end
  10.